#pragma once

#include <sys/wait.h>
#include <signal.h>
#include "ThreadPool.hpp"
#include "Common.hpp"
#include "Log.hpp"
#include "InetAddr.hpp"

using namespace LogModule;
using namespace ThreadPoolModule;

// using task_t  = std::function<void()>;
using func_t = std::function<std::string(const std::string &, InetAddr &peer)>;

const static int defaultsockfd = -1;
const static int backlog = 8;

// 服务器往往是禁止拷贝的,继承我们写的NoCopy就不会被拷贝了
class TcpServer : public NoCopy
{
public:
    TcpServer(uint16_t port, func_t func) : _port(port), _listensockfd(defaultsockfd), _isrunning(false), _func(func)
    {
    }

    // 初始化服务器
    void Init()
    {
        // signal(SIGCHLD, SIG_IGN); // 父进程对子进程忽略这个信号
        //  1.创建套接字
        _listensockfd = socket(AF_INET, SOCK_STREAM, 0);
        if (_listensockfd < 0)
        {
            // 套接字失败
            LOG(LogLevel::FATAL) << "socket error";
            exit(SOCKET_ERR);
        }
        // 创建套接字成功
        LOG(LogLevel::INFO) << "socket success" << _listensockfd;

        // 2.绑定众所周知的端口号
        InetAddr local(_port);
        int n = bind(_listensockfd, local.NetAddrPtr(), local.NetAddrLen());
        if (n < 0)
        {
            LOG(LogLevel::FATAL) << "bind error";
            exit(BIND_ERR);
        }
        LOG(LogLevel::INFO) << "bind success" << _listensockfd;

        // 3.设置socket状态为listen
        n = listen(_listensockfd, backlog);
        if (n < 0)
        {
            LOG(LogLevel::FATAL) << "bind error";
            exit(LISTEN_ERR);
        }
        LOG(LogLevel::INFO) << "listen success: " << _listensockfd;
    }

    class ThreadData
    {
    public:
        ThreadData(int fd, InetAddr &ar, TcpServer *s)
            : sockfd(fd), addr(ar), tsvr(s)
        {
        }

    public:
        int sockfd;
        InetAddr addr;
        TcpServer *tsvr;
    };

    void Service(int sockfd, InetAddr &peer)
    {
        char buffer[1024];
        while (true)
        {
            // 1.先读取数据，用文件操作read
            ssize_t n = read(sockfd, buffer, sizeof(buffer) - 1);
            if (n > 0)
            {
                buffer[n] = 0;
                LOG(LogLevel::DEBUG) << peer.StringAddr() << " # " << buffer;
                std::string echo_string = _func(buffer, peer);
                // 2.再写回数据
                // std::string echo_string = "echo# ";
                // echo_string += buffer;

                write(sockfd, echo_string.c_str(), echo_string.size());
            }
            else if (n == 0)
            {
                LOG(LogLevel::DEBUG) << peer.StringAddr() << "退出了。。。";
                close(sockfd);
                break;
            }
            else
            {
                LOG(LogLevel::DEBUG) << peer.StringAddr() << "异常了。。。";
                close(sockfd);
                break;
            }
        }
    }

    static void *Routine(void *args)
    {
        pthread_detach(pthread_self());
        ThreadData *td = static_cast<ThreadData *>(args);
        td->tsvr->Service(td->sockfd, td->addr);
        delete td;
        return nullptr;
    }

    // 开始运行服务器
    void Run()
    {
        _isrunning = true;
        while (_isrunning)
        {
            // 获取链接
            struct sockaddr_in peer;
            socklen_t len = sizeof(sockaddr_in);
            int sockfd = accept(_listensockfd, CONV(peer), &len);
            if (sockfd < 0)
            {
                LOG(LogLevel::WARNING) << "accept error";
                continue;
            }
            InetAddr addr(peer);
            LOG(LogLevel::INFO) << "accept success, peer addr: " << addr.StringAddr();

            // 多进程版本
            //  提供服务,第二个参数是客户
            //  Service(sockfd, addr);

            // pid_t id = fork();
            // if(id < 0)
            // {
            //     LOG(LogLevel::FATAL) << "fork error";
            //     exit(FORK_ERR);
            // }
            // else if(id == 0)
            // {
            //     //子进程
            //     //子进程能看到sockfd，也能看到listensockfd，但是不能让子进程看到，所以可以关闭
            //     close(_listensockfd);
            //     if(fork() > 0)//再次fork，子进程退出
            //     {
            //         exit(OK);
            //     }
            //     //让子进程进行业务处理
            //     Service(sockfd, addr);//让孙子进程执行任务，最后系统回收孙子进程
            //     exit(OK);
            // }
            // else
            // {
            //     //父进程
            //     //同样不想让他看到sockfd，所以关闭
            //     close(sockfd);
            //     //但是父进程要是不等待，那就僵尸了啊
            //     pid_t rid = waitpid(id, nullptr, 0);//阻塞
            //     (void)rid;
            //     //虽然在等待，但是会忽略信号，这样既不会阻塞也不会僵尸
            // }

            // 多线程版本
            ThreadData *td = new ThreadData(sockfd, addr, this);
            // td->addr = addr;
            // td->sockfd = sockfd;
            // td->tsvr = this;

            pthread_t tid;
            pthread_create(&tid, nullptr, Routine, td);

            // 线程池版本,比较适合处理短服务
            // 将新链接和客户端构建一个新任务，然后push到线程池里面去
            //  ThreadPool<task_t>::GetInstance()->Enqueue([this, sockfd, &addr](){
            //      this->Service(sockfd, addr);
            //  });
        }
        _isrunning = false;
    }

    ~TcpServer()
    {
    }

private:
    uint16_t _port;
    int _listensockfd; // 监听socket

    bool _isrunning;
    func_t _func; // 设置回调处理
};